﻿/;#160当前起点X；#161起点最小X
/;#163当前终点Z
#160=#150
#161=#150-2*#152*TAN [#153]
WHILE [#160 GT #161] DO 1
#160=#160-#154
IF #160 LT #161 THEN #160=#161
#163=[#150-#160]/2/TAN [#153]*-1+#155
G00 X#160 Z2
G01 X#150 Z#163
G00 X[#150+2]
G00 Z#155
G00 X[#160+2]
END 1
M99